(cp1251): Alias for windows-1251.

diff --git a/lisp/language/cyrillic.el b/lisp/language/cyrillic.el
index 9c9c2fd54eb861a3009f173b41443b44e39486fe..ad3ab94049252439301040fadf361b67c63eb498 100644 (file)
--- a/lisp/language/cyrillic.el
+++ b/lisp/language/cyrillic.el
@@ -463,6 +463,8 @@ Support for Russian using koi8-r and the russian-computer input method.")
         ?\\e$,1(V\e(B ?\\e$,1(W\e(B ?\\e$,1(X\e(B ?\\e$,1(Y\e(B ?\\e$,1(Z\e(B ?\\e$,1([\e(B ?\\e$,1(\\e(B ?\\e$,1(]\e(B ?\\e$,1(^\e(B ?\\e$,1(_\e(B ?\\e$,1(`\e(B ?\\e$,1(a\e(B ?\\e$,1(b\e(B ?\\e$,1(c\e(B ?\\e$,1(d\e(B ?\\e$,1(e\e(B ?\\e$,1(f\e(B
         ?\\e$,1(g\e(B ?\\e$,1(h\e(B ?\\e$,1(i\e(B ?\\e$,1(j\e(B ?\\e$,1(k\e(B ?\\e$,1(l\e(B ?\\e$,1(m\e(B ?\\e$,1(n\e(B ?\\e$,1(o\e(B] nil ?b)))
 
+(define-coding-system-alias 'cp1251 'windows-1251)
+
 (set-language-info-alist
  "Bulgarian" `((coding-system windows-1251)
                  (coding-priority windows-1251)